<?php
$isReloadable = false;
require_once("../../pers/inc.config.php");
require_once(R2_FS_WEB_ROOT.'/app/_inc/inc.session.php');
require_once(R2_FS_WEB_ROOT.'/app/_inc/funct.html.php');

$aTipoSorg = array();
$aTipoSorg[''] = '';
$aTipoSorg['PHP']      = 'Linguaggio PHP';                                           
$aTipoSorg['C']        = 'Linguaggio C';                                           
$aTipoSorg['CBL']      = 'COBOL';                                                  
$aTipoSorg['CBLLE']    = 'Integrated Language Environment* COBOL (CBLLE)';                 
$aTipoSorg['CLP']      = 'Linguaggio di Controllo (CL)';                                       
$aTipoSorg['DSPF']     = 'File video (DSPF)';                                                         
$aTipoSorg['LF']       = 'File logico (LF)';                                                        
$aTipoSorg['MNU']      = 'Menu';                                                               
$aTipoSorg['PF']       = 'File fisico (PF)';                                                        
$aTipoSorg['PRTF']     = 'File di stampa (PRTF)';                                                     
$aTipoSorg['RPG']      = 'RPG';                                                                
$aTipoSorg['RPGLE']    = 'Integrated Language Environment RPG (RPGLE)';                                
$aTipoSorg['RPT']      = 'RPG Auto Report';                                                    
$aTipoSorg['SAVF']     = 'File di salvataggio';                                                
//$aTipoSorg['SQLC']     = 'DB2/400 Query Manager C';                                            
//$aTipoSorg['SQLCBL']   = 'DB2/400 Query Manager COBOL';                                        
//$aTipoSorg['SQLCBLLE'] = 'DB2/400 Query Manager COBOL/400 Integrated Language Environment';   
//$aTipoSorg['SQLRPG']   = 'DB2/400 Query Manager RPG';                                         
//$aTipoSorg['SQLRPGLE'] = 'DB2/400 Query Manager RPG/400 Integrated Language Environment';     
$aTipoSorg['TXT']      = 'Testo';
$aTipoSorg['altro']    = 'altro...';

$aLibrerie = array();
$aLibrerie[''] = '';
$aLibrerie['OCSPGM']   = 'OCSPGM';
$aLibrerie['OCSPGMN']  = 'OCSPGMN';
$aLibrerie['KRMADLE']  = 'KRMADLE';
$aLibrerie['KRMADLEN'] = 'KRMADLEN';
$aLibrerie['KRMTEST']  = 'KRMTEST'; 
$aLibrerie['KRMTESTN'] = 'KRMTESTN'; 
$aLibrerie['KRMFILE']  = 'KRMFILE';
$aLibrerie['KRMFILEN'] = 'KRMFILEN';
$aLibrerie['PUBFILE']  = 'PUBFILE';
$aLibrerie['PUBTESTN'] = 'PUBTESTN';
$aLibrerie['KRMEDP']   = 'KRMEDP';
$aLibrerie['CARBCADATI'] = 'CARBCADATI - Prod. Carifin';
$aLibrerie['CARIMAST']   = 'CARIMAST   - Prod. Carifin';
$aLibrerie['CARTSTDATI'] = 'CARTSTDATI - Demo Carifin';
$aLibrerie['CARIMASX']   = 'CARIMASX   - Demo Carifin';
$aLibrerie['CARBCADATN'] = 'CARBCADATN - Test Carifin';
$aLibrerie['CARIMASN']   = 'CARIMASN   - Test Carifin';
$aLibrerie['PLUSDATI']   = 'PLUSDATI - Prod. Plusvalore';
$aLibrerie['PLUSMAST']   = 'PLUSMAST - Prod. Plusvalore';
$aLibrerie['PLUSDATX']   = 'PLUSDATX - Demo Plusvalore';
$aLibrerie['PLUSMASX']   = 'PLUSMASX - Demo Plusvalore';
$aLibrerie['PLUSDATN']   = 'PLUSDATN - Test Plusvalore';
$aLibrerie['PLUSMASN']   = 'PLUSMASN - Test Plusvalore';
$aLibrerie['ADRBCADATI'] = 'ADRBCADATI - Prod. Detto Factor';
$aLibrerie['ADRBCAMAST'] = 'ADRBCAMAST - Prod. Detto Factor';
$aLibrerie['ADRTSTDATI'] = 'ADRTSTDATI - Demo Detto Factor';
$aLibrerie['ADRTSTMAST'] = 'ADRTSTMAST - Demo Detto Factor';
$aLibrerie['ADRTSTDATN'] = 'ADRTSTDATN - Test Detto Factor';
$aLibrerie['ADRTSTMASN'] = 'ADRTSTMASN - Test Detto Factor';
$aLibrerie['altro']    = 'altro...';

if (reqVar('prefile')=='') $_REQUEST['prefile'] = uniqid('pref');

// azioni
if (reqVar('azione') == 'salva' or reqVar('azione') == 'salva_torna'
                                or reqVar('azione') == 'modifica') {$msgPag .= confSorgenti();}

if (reqVar('azione') == 'eliminaSorgente') {$msgPag .= eliminaSorgente();}    

reqDef('tipo_sorg', 'altro');
reqDef('libreria', 'altro');

$sSqlSel = " SELECT * FROM rint_sorg_mod ".
           " WHERE id_rint = ".intval(reqVar('id_rint')).
		   " ORDER BY nome_sorg, tipo_sorg, libreria";
$objDB->query($sSqlSel,'selRec');

$sSqlRint = "SELECT id_rint, descr, stato FROM rint WHERE id_rint = ".intval(reqVar('id_rint'));
$objDB->query($sSqlRint,'selRint');
if (!$acRint = $objDB->fetch('selRint')) {
	backOnErr("var. id. '".reqVar('id_rint')."' mancante o errato");
}

if (reqVar('azione') == 'modiSorgente') {
	
	$smSorg = " SELECT * FROM rint_sorg_mod ". 
              " WHERE id_rint = ".intval(reqVar('id_rint')).
              " AND nome_sorg = '".reqVarAS('nome_sorg_e')."' ".
              " AND tipo_sorg = '".reqVarAS('tipo_sorg_e')."' ".
              " AND  libreria = '".reqVarAS('libreria_e')."' "; 
	$objDB->query($smSorg,'smSorg');
	if ($smRec = $objDB->fetch('smSorg')) {
		$_REQUEST['nome_sorg'] = $smRec['nome_sorg']; 
		if (!isset($aTipoSorg[$smRec['tipo_sorg']])) {
			$_REQUEST['tipo_sorg'] = 'altro'; 
			$_REQUEST['altro_tipo_sorg'] = $smRec['tipo_sorg']; 
		} else {
			$_REQUEST['tipo_sorg'] = $smRec['tipo_sorg']; 
		}
		if (!isset($aLibrerie[$smRec['libreria']])) {
			$_REQUEST['libreria'] = 'altro'; 
			$_REQUEST['altra_libreria'] = $smRec['libreria']; 
		} else {
			$_REQUEST['libreria'] = $smRec['libreria']; 
		}
		$_REQUEST['nota']      = $smRec['nota'];
	}	
}


$aOpt_ts = array();
$aOpt_ts['onChange'] = "javascript:scriviAltro('tipo', document.frm1.tipo_sorg.value)"; 

$aOpt_l = array();
$aOpt_l['onChange'] = "javascript:scriviAltro('libreria', document.frm1.libreria.value)"; 

$aOpt_ats = array();
if (reqVar('tipo_sorg') == 'altro') {
	$aOpt_ats['style'] = 'visibility:visible;';
} else {
	$aOpt_ats['style'] = 'visibility:hidden;';	
}

$aOpt_al = array();
if (reqVar('libreria') == 'altro') {
	$aOpt_al['style'] = 'visibility:visible;';
} else {
	$aOpt_al['style'] = 'visibility:hidden;';	
}

$sCmdL = "";
$sCmdR = "";

if (reqVar('azione') == 'modiSorgente' or reqVar('azione') == 'modifica') {
	$sCmdR .= "<a class='cmd1' href=\"javascript:submAzione('modifica');\">conferma</a>";
	$sCmdR .= "&nbsp;&nbsp;&nbsp";	
	$sCmdR .= "<a class='cmd1' href='rintSorgenti.php?id_rint=".reqVar('id_rint')."&xsn=".XSN."'>esci da modifica</a>";
} else {
	$sCmdR .= "<a class='cmd1' href=\"javascript:submAzione('salva');\">salva</a>";
	$sCmdR .= "&nbsp;&nbsp;&nbsp";
	$sCmdR .= "<a class='cmd1' href=\"javascript:submAzione('salva_torna');\">salva e torna</a>";
	$sCmdR .= cmdTorna('torna', 3);
}
testaHtml('Sorgenti modificati', $msgPag);
?>

<script>
function submAzione(azione) {
	document.frm1.azione.value=azione;
	document.frm1.submit();
}
function eliminaModificaSorgente(azione, nome, tipo, libreria) {
	document.frm1.azione.value=azione;
	document.frm1.nome_sorg_e.value=nome;
	document.frm1.tipo_sorg_e.value=tipo;
	document.frm1.libreria_e.value=libreria;
	document.frm1.submit();
}

function scriviAltro(campo, valore) {
	if (campo == 'tipo') {
		if (valore == 'altro') {
			document.frm1.altro_tipo_sorg.style.visibility='visible';
		} else {
			document.frm1.altro_tipo_sorg.style.visibility='hidden';
			document.frm1.altro_tipo_sorg.value = '';
		}
	} else {
		if (valore == 'altro') {
			document.frm1.altra_libreria.style.visibility='visible';
		} else {
			document.frm1.altra_libreria.style.visibility='hidden';
			document.frm1.altra_libreria.value = '';
		}
	}
}

</script>

<table border="0" cellpadding="3" cellspacing="1" width="100%" align='center'>
   <tr>
      <td class="cmd1" align="left" valign='top'><?=$sCmdL?></td>
      <td class="cmd1" align="right"><?=$sCmdR?></td>
   </tr>
</table>

<? 
echo getHtmlform();
echo getHtmlHidden('azione','...');
echo getHtmlHidden('prefile');
echo getHtmlHidden('xsn',XSN);
echo getHtmlHidden('id_rint');

echo getHtmlHidden('nome_sorg_e');
echo getHtmlHidden('tipo_sorg_e');
echo getHtmlHidden('libreria_e');

?>
<table class="tab1" border="0" cellpadding="3" cellspacing="1" width="100%" align='center'>
<?php echo getHtmlRigaRif();?>
	<tr>
		<td class="tit1" colspan='20' align='center' height='25'>Rint - Sorgenti modificati</td>	
	</tr>
	<tr>	
	    <td class="lab1" colspan='3' style='text-align:center;font-size:24pt;'><? echo $acRint['id_rint'];?></td>	
	    <td class="txt1" colspan='17'>
	   		<?echo $acRint['descr']."&nbsp;&nbsp;&nbsp;"; ?> 
	   		<img src='<?= R2_URL_ROOT?>/app/_img/pallino_<?=$aStatiRint[$acRint['stato']]['pallino']?>.gif' width='10' border='0'/>	
			<? echo "&nbsp;&nbsp;&nbsp;".$aStatiRint[$acRint['stato']]['descr'];?>
	    </td>	
    </tr>
	<tr>
		<td class='lab1' colspan='3' height='25'>Nome</td>
		<td class='txt1' colspan='17'><?= getHtmlText('nome_sorg', 95, 80); ?></td>
	</tr>
	<tr>
		<td class='lab1' colspan='3' height='25'>Tipo</td>
		<td class='txt1' colspan='17'>
		<?  echo getHtmlSelect('tipo_sorg', $aTipoSorg, '@REQ', $aOpt_ts);
				echo "&nbsp;&nbsp;&nbsp;&nbsp;";	
				echo getHtmlText('altro_tipo_sorg', 50, 80, '@REQ', $aOpt_ats);
		?>
		</td>
	</tr>
	<tr>
		<td class='lab1' colspan='3' height='25'>Libreria</td>		
		<td class='txt1' colspan='17'>
		<? echo getHtmlSelect('libreria', $aLibrerie, '@REQ', $aOpt_l);
		   echo "&nbsp;&nbsp;&nbsp;&nbsp;";	
		   echo getHtmlText('altra_libreria', 50, 80, '@REQ', $aOpt_al);
		?>
		</td>
	</tr>
	<tr>
		<td class='lab1' colspan='3' height='25'>Nota</td>
		<td class='txt1' colspan='17'>
			<?= getHtmlTextArea('nota', 130, 5); ?>
		</td>
	</tr>
</table>
<?  if ($objDB->numRec('selRec') > 0) { 
		echo "<table class='tab1' border='0' cellpadding='3' cellspacing='1' width='100%' align='center'>";
		echo "<tr><td colspan='5' class='txt1' height='5'></td></tr>";
		echo "<tr>
			  	  <td class='lab1' width='30%'>Nome</td>
			  	  <td class='lab1' width='15%'>Tipo</td>
			  	  <td class='lab1' width='20%'>Libreria</td>
			  	  <td class='lab1' width='30%'>Nota</td>
			  	  <td class='lab1' width='5%'>&nbsp;</td>
			  </tr>";
		while ($acRec = $objDB->fetch('selRec')) {
			echo "<tr>";		
				echo "<td class='txt1'>
					  	 <a class='txt1' href='#' onclick=\"javascript:eliminaModificaSorgente('modiSorgente', '".addslashes($acRec['nome_sorg'])."', '".addslashes($acRec['tipo_sorg'])."', '".addslashes($acRec['libreria'])."');\">
				         		".$acRec['nome_sorg'].
					 "   </a>
					  </td>
				      <td class='txt1'>";
				if (in_array($acRec['tipo_sorg'], array_keys($aTipoSorg))) {
					echo $aTipoSorg[$acRec['tipo_sorg']];
				} else {
					echo $acRec['tipo_sorg'];
				}
				echo "</td>
				      <td class='txt1'>";
				if (in_array($acRec['libreria'], array_keys($aLibrerie))) {
					echo $aLibrerie[$acRec['libreria']];
				} else {
					echo $acRec['libreria'];
				}
				echo "</td>
				      <td class='txt1'";
				      if (strlen($acRec['nota']) > 50) {
				      	echo " title = \"".($acRec['nota'])."\"";
				      }
				      	
				echo ">".substr($acRec['nota'], 0, 50)."</td>
				      <td class='txt1' align='center'>
					  	<a class='txt1' href='#' onclick=\"eliminaModificaSorgente('eliminaSorgente', '".addslashes($acRec['nome_sorg'])."', '".addslashes($acRec['tipo_sorg'])."', '".addslashes($acRec['libreria'])."');\">
					  		<img src='../_img/elimina.gif' height='10' border='0'>
					  	</a>
					  </td>
				  </tr>";
	    }
		echo "</table>";
	}
?>
<table border="0" cellpadding="3" cellspacing="1" width="100%" align='center'>
   <tr>
      <td class="cmd1" align="left" valign='top'><?=$sCmdL?></td>
      <td class="cmd1" align="right"><?=$sCmdR?></td>
   </tr>
</table>
<? 

echo "</form>\n";

codaHtml();
exit();

function confSorgenti() {
	global $objDB, $objSess;

	$msg = '';
	
	if (trim(reqVar('nome_sorg')) == '') {
		$msg .= 'nome obbligatorio</br>';	
	}
	if  (trim(reqVar('tipo_sorg')) == '' or (trim(reqVar('tipo_sorg')) == 'altro' and 
	                                         trim(reqVar('altro_tipo_sorg')) == '')) {
		$msg .= 'tipo obbligatorio</br>';	
	 }
	/* -- tolta obbligatorieta' libreria
	if (trim(reqVar('libreria')) == '' or (trim(reqVar('libreria')) == 'altro' and 
	                                       trim(reqVar('altra_libreria')) == '')) {
		$msg .= 'libreria obbligatoria</br>';	
	}
	*/
	if ($msg != '') {return $msg;}
		
	$tipo_sorg = reqVarAS('tipo_sorg');
	$libreria  = reqVarAS('libreria');
	
	if (trim(reqVar('tipo_sorg')) == 'altro' and 
	    trim(reqVar('altro_tipo_sorg')) != '') {
		$tipo_sorg = reqVarAS('altro_tipo_sorg');
	 }
	 
	if (trim(reqVar('libreria')) == 'altro' and 
	    trim(reqVar('altra_libreria')) != '') {
		$libreria = reqVarAS('altra_libreria');
	 }
	
	if (reqVar('azione') == 'modifica') {
	   	$sUpdSorg = "UPDATE rint_sorg_mod SET ".
				"       nome_sorg = '".reqVarAS('nome_sorg')."' ".
	   			",     tipo_sorg  = '".$tipo_sorg."' ".		
				",      libreria  = '".$libreria."' ".		
		        ",           nota = '".reqVarAS('nota')."'".
	            " WHERE id_rint = ".intval(reqVar('id_rint')).
	            " AND nome_sorg = '".reqVarAS('nome_sorg_e')."' ".
	            " AND tipo_sorg = '".reqVarAS('tipo_sorg_e')."' ".
	            " AND  libreria = '".reqVarAS('libreria_e')."' ";
		$objDB->exec($sUpdSorg, 'updSorg', false);		
		if ($objDB->errno('updSorg') == 1062) {
			$msg .= 'Sorgente gia\' inserita';
		} else {
	   		$_REQUEST['azione']     = "...";
		}
	   	
	} else { 
		 $sInsSorg = " INSERT INTO rint_sorg_mod SET ".
		            "    id_rint = ".intval(reqVar('id_rint')).
		            ", nome_sorg = '".reqVarAS('nome_sorg')."' ".
		            ", tipo_sorg = '".$tipo_sorg."' ".
		            ",  libreria = '".$libreria."' ".
		            ",      nota = '".reqVarAS('nota')."'";
		$objDB->exec($sInsSorg, 'insSorg', false);		
		if ($objDB->errno('insSorg') == 1062) {
			$msg .= 'Sorgente gia\' inserita';
		}
	}
	
	if ($msg != '') {return $msg;}

	$_REQUEST['nome_sorg'] = "";
	$_REQUEST['tipo_sorg'] = "altro";
	$_REQUEST['libreria']  = "altro";
	$_REQUEST['nota']      = "";
	$_REQUEST['altro_tipo_sorg'] = "";
	$_REQUEST['altra_libreria']  = "";
	
	$_REQUEST['nome_sorg_e'] = "";
	$_REQUEST['tipo_sorg_e'] = "";
	$_REQUEST['libreria_e']  = "";
	
	if (reqVar('azione') == 'salva_torna') {
		header("Location: ".urlTorna('rint '.intval(reqVar('id_rint')).': sorgenti inserite.'));
		exit();
	}
}

function eliminaSorgente() {
	global $objDB, $objSess;
	
	$sDelSorg = " DELETE FROM rint_sorg_mod ". 
	            " WHERE id_rint = ".intval(reqVar('id_rint')).
	            " AND nome_sorg = '".reqVarAS('nome_sorg_e')."' ".
	            " AND tipo_sorg = '".reqVarAS('tipo_sorg_e')."' ".
	            " AND  libreria = '".reqVarAS('libreria_e')."' "; 
	$objDB->exec($sDelSorg);
	
}

?>